home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / dsp / dspgroup / macros.arc / MOV.ASM < prev    next >
Encoding:
Assembly Source File  |  1983-11-17  |  1.1 KB  |  15 lines
  1.  
  2. *                                                                               
  3. *MOVE ONE WORD (A TO B)                                                         
  4. *                                                                               
  5. MOV    $MACRO  A,B                                                              
  6.        $IF  A.L=0        IF A IS AC                                             
  7.        SACL XR0,0        SAVE AC                                                
  8.        LAR  AR0,XR0      LOAD TO AR0                                            
  9.        LARP AR0          SELECT AR0                                             
  10.        LAC  *,0          LOAD *                                                 
  11.        $ELSE                                                                    
  12.        LAC  :A:,0        LOAD :A:                                               
  13.        $ENDIF                                                                   
  14.        SACL :B:,0        STORE :B:                                              
  15.        $END